inherited FCadBlocoModelo: TFCadBlocoModelo
  Left = 778
  Top = 203
  Width = 663
  Height = 251
  Caption = 'Modelo'
  OldCreateOrder = True
  PixelsPerInch = 96
  TextHeight = 13
  object lbl3: TLabel [4]
    Left = 16
    Top = 56
    Width = 36
    Height = 13
    Caption = 'MODID'
    FocusControl = dbedtMODID
  end
  object lbl1: TLabel [5]
    Left = 16
    Top = 104
    Width = 92
    Height = 13
    Caption = 'EMPBLOMODQTD'
    FocusControl = dbedtEMPBLOMODQTD
  end
  inherited BtCancelar: TBitBtn
    Left = 556
    Top = 171
    Width = 79
    Height = 30
  end
  inherited BtGravar: TBitBtn
    Left = 475
    Top = 170
    Width = 79
    Height = 30
  end
  inherited BtExcluir: TBitBtn
    Left = 564
  end
  object dbedtMODID: TDBEdit [9]
    Left = 16
    Top = 72
    Width = 97
    Height = 21
    Color = clMoneyGreen
    DataField = 'MODID'
    DataSource = ds1
    TabOrder = 3
    OnExit = dbedtMODIDExit
  end
  object EdDescModelo: TEdit [10]
    Left = 112
    Top = 72
    Width = 521
    Height = 21
    ReadOnly = True
    TabOrder = 4
  end
  object dbedtEMPBLOMODQTD: TDBEdit [11]
    Left = 16
    Top = 120
    Width = 134
    Height = 21
    DataField = 'EMPBLOMODQTD'
    DataSource = ds1
    TabOrder = 5
  end
  inherited qFilha: TQuery
    SQL.Strings = (
      'SELECT * FROM EMPREENDIMENTOBLOCOMODELO WHERE 1=-1')
    object qFilhaEMPREENDID: TIntegerField
      FieldName = 'EMPREENDID'
      Origin = '"BDSISTEMA.FDB".EMPREENDIMENTOBLOCOMODELO.EMPREENDID'
    end
    object qFilhaEMPBLOID: TIntegerField
      FieldName = 'EMPBLOID'
      Origin = '"BDSISTEMA.FDB".EMPREENDIMENTOBLOCOMODELO.EMPBLOID'
    end
    object qFilhaMODID: TIntegerField
      FieldName = 'MODID'
      Origin = '"BDSISTEMA.FDB".EMPREENDIMENTOBLOCOMODELO.MODID'
    end
    object intgrfldFilhaEMPBLOMODQTD: TIntegerField
      FieldName = 'EMPBLOMODQTD'
      Origin = '"BDSISTEMA.FDB".EMPREENDIMENTOBLOCOMODELO.EMPBLOMODQTD'
    end
  end
  inherited qGenerica: TQuery
    Left = 452
    Top = 3
  end
  object ds1: TDataSource
    DataSet = qFilha
    Left = 320
    Top = 96
  end
  object QGENERICA2: TQuery
    DatabaseName = 'BDSistema.FDB'
    Left = 496
    Top = 40
  end
end
